LustigeDreiecke2.txt
*******************************************

Script mit Doppelklick oder STRG+R aufrufen

____________________________________________

ScriptBegin
var Grafik="Script Line";

var PenC   ="dimgray"
var BackC0 ="#a2bd76";
var Fill1  ="green";
var Fill2  ="yellowgreen";
var Fill3  ="yellow";
var alpha  =220;

function init()  //Initialisierungen
{ t.setAntiAliasing();
  t.setBrush(BackC0);
  t.setPage();
  t.msg( "Diashow: "+t.showDia(500,10), "blue");
}


function draw() //Zeichenbefehle
{
  setRnd();

  t.setPen(PenC,0); 
  t.setRndRGB(Fill1);
  t.setRndHeller(100,140);
  drawDreiecke(200);

  t.goTo(t.rnd(80),t.rnd(40));
  t.setRndRGB(Fill2);
  drawDreiecke(1200);

  t.goTo(t.rnd(20),t.rnd(20));
  t.setRndRGB(Fill3);
  drawDreiecke(600);
}

function drawDreiecke(max)
{for(i=0; i<max; i++)
  { dreieck();
    t.move(t.rndN(1)); t.turn(t.rndN(0));    
  }
}


function dreieck()
{ x=t.lastX(); y=t.lastY(); w=t.lastW();

  t.trianglePolygon(
    t.rndN(2),t.rndN(3),t.rndN(2));
 
   t.setBrush(t.rndRGB1(),1,alpha);
  t.turnTo(0); t.goTo(0,0); t.drawPolygon();
  t.turnTo(w); t.goTo(x,y);
}


function setRnd()
{ //Zufallsfunktionen setzen
  t.clrRndN()
  
  //Winkel rndN(0) definieren
  t.setRndN(0,0,30,150);
  t.setRndN(0,31,90,80);
  t.setRndN(0,91,125,10);
  t.setRndN(0,0,-30,80);
  t.setRndN(0,-31,-90,40);
  t.setRndN(0,-91,-125,5);

  //Move rndN(1) definieren
  t.setRndN(1,1,2,25);
  t.setRndN(1,3,9,35);
  t.setRndN(1,10,15,10);

  //Dreiecke c,a
//  t.setRndN(2,1,2,5);
  t.setRndN(2,3,8,25);
  t.setRndN(2,9,12,30);
  t.setRndN(2,13,18,50);
  t.setRndN(2,19,35,1);

  //Dreiecke Winkel ca
 // t.setRndN(3,15,20,15);
  t.setRndN(3,21,30,50);
  t.setRndN(3,11,80,100);
  t.setRndN(3,81,100,10);  
  t.setRndN(3,101,150,1);  

 // t.msgRndN();

}

ScriptEnd
